home *** CD-ROM | disk | FTP | other *** search
/ MacHack 1997 / MacHack 1997.toast / Hacks / Hacks ’94 / [√] May be freely distributed / Roy Leban / Pig Latin Folder / PigLatin.r < prev   
Text File  |  1994-07-01  |  2KB  |  74 lines
  1. /*
  2.  *    Pig Latin Extension for FullWrite
  3.  *
  4.  *    © 1994 by Akimbo Systems, Inc.
  5.  *
  6.  *    Limited distribution permitted.  This code and the compiled extension
  7.  *    may be distributed provided that they are unmodified and that no
  8.  *    charge is made for them.
  9.  *
  10.  *    This extension was built with the preliminary FullWrite Extension SDK.
  11.  *    For information, send e-mail to FullWrite@akimbo.com
  12.  */
  13.  
  14. resource 'FWXT' (512, "Pig Latinize", preload) {
  15.     { 1, editExtrasPlaceholder, alphabetical, noKey, noEventCode, plain,
  16.       needsTextSelection, unused2 },
  17.     simpleTextSelOnlyExtension {},
  18.     512,
  19.     { keepFileOpen, noDocSetup, noPreferences, noBaseStyle, noUpdateRequests,
  20.       anySystemOK, anyMachineOK, unused9 },
  21.     { dontNotifyOthers, noNotification },
  22.     { noInterception },
  23.     unused2,
  24.     { "", "© 1994 Akimbo Systems Inc.", }
  25.     };
  26.     
  27. resource 'FWXT' (513, "Pig Latin", preload) {
  28.     { 1, stylePlaceholder, alphabetical, noKey, noEventCode, plain,
  29.       needsDocument, unused2 },
  30.     genericExtension {},
  31.     512,
  32.     { keepFileOpen, noDocSetup, noPreferences, noBaseStyle, noUpdateRequests,
  33.       anySystemOK, anyMachineOK, unused9 },
  34.     { dontNotifyOthers, noNotification },
  35.     { dontInterceptEvents,
  36.       dontInterceptNullEvents,
  37.       dontInterceptCommands,
  38.       dontInterceptBanters,
  39.       interceptWords,
  40.       unused6,
  41.       commandNotSpecified
  42.       },
  43.     unused2,
  44.     { "", "© 1994 Akimbo Systems Inc.", }
  45.     };
  46.     
  47. resource 'vers' (1) {
  48.     2, 0, release, 0,
  49.     verUS,
  50.     "2.0", "Pig Latin Extension\n© 1994 Akimbo Systems Inc."
  51.     };
  52.  
  53. resource 'vers' (2) {
  54.     2, 0, release, 0,
  55.     verUS,
  56.     "2.0", "FullWrite 2.0"
  57.     };
  58.  
  59. type 'Pig?' {
  60.     byte = ' ';
  61.     string;
  62.     };
  63.  
  64. resource 'Pig?' (1) {
  65.     // Translates the selection into Pig Latin.
  66.     "Anslatestray ethay electionsay intoyay Igpay Atinlay."
  67.     };
  68.  
  69. resource 'Pig?' (2) {
  70.     // Translates all the text you type into Pig Latin.
  71.     "Anslatestray allyay ethay exttay youyay ypetay intoyay Igpay Atinlay."
  72.     };
  73.  
  74.